home *** CD-ROM | disk | FTP | other *** search
/ Developer CD Series 1995 February: Tool Chest / Dev.CD Feb 95 / Dev.CD Feb 95.toast / Tool Chest / Interfaces / Universal Interfaces 2.0a3 / Universal AIncludes / ShutDown.a < prev    next >
Encoding:
Text File  |  1994-11-11  |  1.5 KB  |  77 lines  |  [TEXT/MPS ]
  1. ;
  2. ;    File:        ShutDown.a
  3. ;
  4. ;    Copyright:    © 1984-1994 by Apple Computer, Inc.
  5. ;                All rights reserved.
  6. ;
  7. ;    Version:    Universal Interfaces 2.0a3  ETO #16, MPW prerelease.  Friday, November 11, 1994. 
  8. ;
  9. ;    Bugs?:        If you find a problem with this file, send the file and version
  10. ;                information (from above) and the problem description to:
  11. ;
  12. ;                    Internet:    apple.bugs@applelink.apple.com
  13. ;                    AppleLink:    APPLE.BUGS
  14. ;
  15. ;
  16.  
  17.     IF &TYPE('__SHUTDOWN__') = 'UNDEFINED' THEN
  18. __SHUTDOWN__ SET 1
  19.  
  20.  
  21.     IF &TYPE('__TYPES__') = 'UNDEFINED' THEN
  22.     include 'Types.a'
  23.     ENDIF
  24. ;        include 'ConditionalMacros.a'                                ;
  25.  
  26.     IF &TYPE('__MIXEDMODE__') = 'UNDEFINED' THEN
  27.     include 'MixedMode.a'
  28.     ENDIF
  29.  
  30. sdOnPowerOff                    EQU        1                    ;call procedure before power off.
  31. sdOnRestart                        EQU        2                    ;call procedure before restart.
  32. sdOnUnmount                        EQU        4                    ;call procedure before unmounting.
  33. sdOnDrivers                        EQU        8                    ;call procedure before closing drivers.
  34. sdRestartOrPower                EQU        3                    ;call before either power off or restart.
  35.  
  36.     IF GENERATING68K THEN
  37.         Macro
  38.         _ShutDwnPower
  39.             move.w    #$0001,-(sp)
  40.             dc.w     $A895
  41.         EndM
  42.     ELSE
  43.         IMPORT    ShutDwnPower
  44.     ENDIF
  45.  
  46.     IF GENERATING68K THEN
  47.         Macro
  48.         _ShutDwnStart
  49.             move.w    #$0002,-(sp)
  50.             dc.w     $A895
  51.         EndM
  52.     ELSE
  53.         IMPORT    ShutDwnStart
  54.     ENDIF
  55.  
  56.     IF GENERATING68K THEN
  57.         Macro
  58.         _ShutDwnInstall
  59.             move.w    #$0003,-(sp)
  60.             dc.w     $A895
  61.         EndM
  62.     ELSE
  63.         IMPORT    ShutDwnInstall
  64.     ENDIF
  65.  
  66.     IF GENERATING68K THEN
  67.         Macro
  68.         _ShutDwnRemove
  69.             move.w    #$0004,-(sp)
  70.             dc.w     $A895
  71.         EndM
  72.     ELSE
  73.         IMPORT    ShutDwnRemove
  74.     ENDIF
  75.  
  76.     ENDIF ; __SHUTDOWN__
  77.